###
### Authors:
###   Christian Schulte <schulte@ps.uni-sb.de>
###
### Copyright:
###   Christian Schulte, 1998
###
### Last change:
###   $Date: 2003/12/18 15:12:39 $ by $Author: raph $
###   $Revision: 1.5 $
###
### This file is part of Mozart, an implementation 
### of Oz 3:
###    http://www.mozart-oz.org
###
### See the file "LICENSE" or
###    http://www.mozart-oz.org/LICENSE.html
### for information on usage and redistribution 
### of this file, and for a DISCLAIMER OF ALL 
### WARRANTIES.
###

# -*-perl-*-

%builtins_all =
    (
     'controlVarHandler' => { in  => ['value'],
			      out => [],
			      BI  => BIcontrolVarHandler},

     'atRedo'            => { in  => ['value', 'value'],
			      out => [],
			      BI  => BIatRedo},

     'fail'		 => { in  => [],
			      out => [],
			      BI  => BIfail},

     'skip'		 => { in  => [],
			      out => [],
			      BI  => BIskip},

     'UNKNOWN'		 => { in  => [],
			      out => [],
			      BI  => BIfail},

     'load'		 => { in  => ['value', 'value'],
			      out => [],
			      BI  => BIload},

     'getInternal'       => { in  => ['value'],
			      out => ['value'],
			      BI  => BIObtainGetInternal},

     'getNative'         => { in  => ['value'],
			      out => ['value'],
			      BI  => BIObtainGetNative},

     'propagate'	 => { in  => [],
			      out => [],
			      BI  => BI_prop_lpq},

	 'gec_propagate'	 => { in  => [],
			      out => [],
			      BI  => BI_prop_gec},

     'waitStatus'	 => { in  => ['value', 'value'],
			      out => ['value'],
			      BI  => BIwaitStatus},

     'bindReadOnly'	 => { in  => ['value', 'value'],
			      out => [],
			      BI  => BIbindReadOnly},

     'varToReadOnly'	 => { in  => ['value', 'value'],
			      out => [],
			      BI  => BIvarToReadOnly},

     );

1;;
